/ MacFormat 1994 November / macformat-018.iso / Comms Spectacular / AppleTalk Remote Access / USR-2_0.ARA

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 55 53 52 2d 32 5f | 30 2e 41 52 41 00 00 00 |..USR-2_|0.ARA...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 6d 6c 74 73 73 6c 6e | 6b 01 00 00 00 00 00 00 |.mltssln|k.......|
|00000050| 00 00 00 00 00 22 94 00 | 00 01 7e aa 83 a4 f8 aa |....."..|..~.....|
|00000060| 83 a4 fa 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 0a e5 00 00 |........|........|
|00000080| 21 20 20 55 53 52 6f 62 | 6f 74 69 63 73 20 41 52 |!  USRob|otics AR|
|00000090| 41 20 32 2e 30 20 4d 6f | 64 65 6d 20 53 63 72 69 |A 2.0 Mo|dem Scri|
|000000a0| 70 74 0d 21 20 20 38 2f | 38 2f 39 34 20 2d 20 31 |pt.!  8/|8/94 - 1|
|000000b0| 35 3a 31 39 0d 21 0d 21 | 20 20 54 68 69 73 20 73 |5:19.!.!|  This s|
|000000c0| 63 72 69 70 74 20 73 68 | 6f 75 6c 64 20 77 6f 72 |cript sh|ould wor|
|000000d0| 6b 20 77 69 74 68 20 61 | 6e 79 20 6f 66 20 6f 75 |k with a|ny of ou|
|000000e0| 72 20 6d 6f 64 65 6d 73 | 20 75 73 69 6e 67 20 6f |r modems| using o|
|000000f0| 75 72 20 63 75 72 72 65 | 6e 74 0d 21 20 20 63 6f |ur curre|nt.!  co|
|00000100| 6d 6d 61 6e 64 2d 73 65 | 74 2e 20 20 54 68 69 73 |mmand-se|t.  This|
|00000110| 20 77 6f 75 6c 64 20 69 | 6e 63 6c 75 64 65 20 61 | would i|nclude a|
|00000120| 6c 6c 20 6f 66 20 6f 75 | 72 20 39 36 30 30 2c 20 |ll of ou|r 9600, |
|00000130| 31 34 34 30 30 2c 20 61 | 6e 64 20 32 38 38 30 30 |14400, a|nd 28800|
|00000140| 0d 21 20 20 62 70 73 20 | 6d 6f 64 65 6d 73 2e 0d |.!  bps |modems..|
|00000150| 21 0d 21 20 20 27 6d 6c | 74 73 27 20 72 65 73 6f |!.!  'ml|ts' reso|
|00000160| 75 72 63 65 20 69 6e 66 | 6f 20 66 6f 72 20 74 68 |urce inf|o for th|
|00000170| 69 73 20 6d 6f 64 65 6d | 3a 0d 21 20 20 20 20 62 |is modem|:.!    b|
|00000180| 79 74 65 20 31 20 3d 3d | 20 30 31 20 2d 3e 20 6d |yte 1 ==| 01 -> m|
|00000190| 6f 64 65 6d 20 48 41 53 | 20 62 75 69 6c 74 69 6e |odem HAS| builtin|
|000001a0| 20 72 65 6c 69 61 62 69 | 6c 69 74 79 20 70 72 6f | reliabi|lity pro|
|000001b0| 74 6f 63 6f 6c 73 0d 21 | 20 20 20 20 62 79 74 65 |tocols.!|    byte|
|000001c0| 20 32 20 3d 3d 20 30 30 | 20 2d 3e 20 72 65 73 65 | 2 == 00| -> rese|
|000001d0| 72 76 65 64 20 62 79 20 | 41 70 70 6c 65 0d 21 20 |rved by |Apple.! |
|000001e0| 20 20 20 62 79 74 65 20 | 33 20 3d 3d 20 32 31 20 |   byte |3 == 21 |
|000001f0| 2d 3e 20 6d 61 78 20 68 | 65 78 20 63 68 61 72 73 |-> max h|ex chars|
|00000200| 20 69 6e 20 76 61 72 73 | 74 72 20 37 20 28 33 33 | in vars|tr 7 (33|
|00000210| 20 64 65 63 29 0d 21 20 | 20 20 20 62 79 74 65 20 | dec).! |   byte |
|00000220| 34 20 3d 3d 20 32 31 20 | 2d 3e 20 6d 61 78 20 68 |4 == 21 |-> max h|
|00000230| 65 78 20 63 68 61 72 73 | 20 69 6e 20 76 61 72 73 |ex chars| in vars|
|00000240| 74 72 20 38 0d 21 20 20 | 20 20 62 79 74 65 20 35 |tr 8.!  |  byte 5|
|00000250| 20 3d 3d 20 32 31 20 2d | 3e 20 6d 61 78 20 68 65 | == 21 -|> max he|
|00000260| 78 20 63 68 61 72 73 20 | 69 6e 20 76 61 72 73 74 |x chars |in varst|
|00000270| 72 20 39 0d 21 20 20 20 | 20 20 20 20 0d 40 4f 52 |r 9.!   |    .@OR|
|00000280| 49 47 49 4e 41 54 45 0d | 40 41 4e 53 57 45 52 0d |IGINATE.|@ANSWER.|
|00000290| 21 0d 21 20 73 65 74 20 | 75 70 20 74 68 65 20 6d |!.! set |up the m|
|000002a0| 6f 64 65 6d 20 2d 20 6c | 61 62 65 6c 20 72 61 6e |odem - l|abel ran|
|000002b0| 67 65 20 69 73 20 31 2d | 31 30 0d 21 0d 21 20 4d |ge is 1-|10.!.! M|
|000002c0| 61 63 20 74 61 6c 6b 73 | 20 74 6f 20 74 68 65 20 |ac talks| to the |
|000002d0| 6d 6f 64 65 6d 20 61 74 | 20 35 37 2c 36 30 30 20 |modem at| 57,600 |
|000002e0| 62 70 73 2e 20 20 0d 73 | 65 72 72 65 73 65 74 20 |bps.  .s|erreset |
|000002f0| 35 37 36 30 30 2c 20 30 | 2c 20 38 2c 20 31 0d 21 |57600, 0|, 8, 1.!|
|00000300| 0d 21 20 72 65 73 65 74 | 20 74 68 65 20 73 65 72 |.! reset| the ser|
|00000310| 69 61 6c 20 70 6f 72 74 | 0d 48 53 52 65 73 65 74 |ial port|.HSReset|
|00000320| 20 30 20 31 20 30 20 30 | 20 30 20 30 0d 73 65 74 | 0 1 0 0| 0 0.set|
|00000330| 74 72 69 65 73 20 30 0d | 21 0d 40 4c 41 42 45 4c |tries 0.|!.@LABEL|
|00000340| 20 31 0d 6d 61 74 63 68 | 63 6c 72 0d 6d 61 74 63 | 1.match|clr.matc|
|00000350| 68 73 74 72 20 31 20 33 | 20 22 4f 4b 5c 31 33 5c |hstr 1 3| "OK\13\|
|00000360| 31 30 22 0d 21 20 26 46 | 20 20 2d 20 72 65 63 61 |10".! &F|  - reca|
|00000370| 6c 6c 20 66 61 63 74 6f | 72 79 20 73 65 74 74 69 |ll facto|ry setti|
|00000380| 6e 67 73 0d 21 20 26 44 | 30 20 2d 20 4f 76 65 72 |ngs.! &D|0 - Over|
|00000390| 2d 72 69 64 65 20 44 54 | 52 20 66 6f 72 20 48 61 |-ride DT|R for Ha|
|000003a0| 72 64 77 61 72 65 20 48 | 61 6e 64 73 68 61 6b 69 |rdware H|andshaki|
|000003b0| 6e 67 20 43 61 62 6c 65 | 73 2e 0d 21 20 26 48 31 |ng Cable|s..! &H1|
|000003c0| 26 52 32 20 2d 20 45 6e | 61 62 6c 65 20 43 54 53 |&R2 - En|able CTS|
|000003d0| 2f 52 54 53 20 48 61 72 | 64 77 61 72 65 20 66 6c |/RTS Har|dware fl|
|000003e0| 6f 77 20 63 6f 6e 74 72 | 6f 6c 0d 21 20 26 42 31 |ow contr|ol.! &B1|
|000003f0| 20 2d 20 44 69 73 61 62 | 6c 65 20 61 75 74 6f 20 | - Disab|le auto |
|00000400| 70 6f 72 74 20 72 61 74 | 65 20 61 64 6a 75 73 74 |port rat|e adjust|
|00000410| 0d 21 20 53 30 3d 30 20 | 2d 20 44 6f 6e 27 74 20 |.! S0=0 |- Don't |
|00000420| 61 6e 73 77 65 72 20 63 | 61 6c 6c 73 0d 21 20 45 |answer c|alls.! E|
|00000430| 30 56 31 51 30 20 20 20 | 2d 20 54 75 72 6e 20 63 |0V1Q0   |- Turn c|
|00000440| 6f 6d 6d 61 6e 64 20 65 | 63 68 6f 20 6f 66 66 0d |ommand e|cho off.|
|00000450| 21 20 26 4d 30 20 2d 20 | 45 6e 74 65 72 20 6e 6f |! &M0 - |Enter no|
|00000460| 72 6d 61 6c 20 6d 6f 64 | 65 20 28 6e 6f 20 72 65 |rmal mod|e (no re|
|00000470| 6c 69 61 62 69 6c 69 74 | 79 20 70 72 6f 74 6f 63 |liabilit|y protoc|
|00000480| 6f 6c 73 29 0d 77 72 69 | 74 65 20 22 41 54 26 46 |ols).wri|te "AT&F|
|00000490| 26 44 30 26 48 31 26 52 | 32 26 42 31 26 41 30 53 |&D0&H1&R|2&B1&A0S|
|000004a0| 30 3d 30 45 30 56 31 51 | 30 26 4d 30 5c 31 33 22 |0=0E0V1Q|0&M0\13"|
|000004b0| 0d 6d 61 74 63 68 72 65 | 61 64 20 31 35 0d 69 6e |.matchre|ad 15.in|
|000004c0| 63 74 72 69 65 73 0d 69 | 66 74 72 69 65 73 20 32 |ctries.i|ftries 2|
|000004d0| 20 37 31 0d 21 0d 21 20 | 52 65 73 65 74 20 74 68 | 71.!.! |Reset th|
|000004e0| 65 20 4d 6f 64 65 6d 0d | 21 0d 44 54 52 53 65 74 |e Modem.|!.DTRSet|
|000004f0| 0d 70 61 75 73 65 20 35 | 0d 44 54 52 43 6c 65 61 |.pause 5|.DTRClea|
|00000500| 72 0d 70 61 75 73 65 20 | 35 0d 44 54 52 53 65 74 |r.pause |5.DTRSet|
|00000510| 0d 66 6c 75 73 68 0d 6a | 75 6d 70 20 31 0d 21 0d |.flush.j|ump 1.!.|
|00000520| 40 4c 41 42 45 4c 20 33 | 0d 21 20 4d 6f 64 65 6d |@LABEL 3|.! Modem|
|00000530| 20 72 65 73 70 6f 6e 64 | 69 6e 67 20 26 20 63 6f | respond|ing & co|
|00000540| 6e 66 69 67 75 72 65 64 | 2e 0d 21 20 64 65 74 65 |nfigured|..! dete|
|00000550| 72 6d 69 6e 65 20 69 66 | 20 72 65 6c 69 61 62 6c |rmine if| reliabl|
|00000560| 65 20 6c 69 6e 6b 20 69 | 73 20 72 65 71 75 65 73 |e link i|s reques|
|00000570| 74 65 64 2e 0d 21 0d 21 | 20 69 66 20 6d 6f 64 65 |ted..!.!| if mode|
|00000580| 6d 20 6d 6e 70 31 30 20 | 6c 69 6e 6b 20 72 65 71 |m mnp10 |link req|
|00000590| 75 65 73 74 65 64 20 28 | 76 61 72 20 34 20 3d 3d |uested (|var 4 ==|
|000005a0| 20 32 29 20 74 68 65 6e | 20 6a 75 6d 70 20 6c 61 | 2) then| jump la|
|000005b0| 62 65 6c 20 34 0d 69 66 | 73 74 72 20 34 20 34 20 |bel 4.if|str 4 4 |
|000005c0| 22 32 22 0d 21 0d 21 20 | 69 66 20 6d 6f 64 65 6d |"2".!.! |if modem|
|000005d0| 20 76 34 32 20 6c 69 6e | 6b 20 72 65 71 75 65 73 | v42 lin|k reques|
|000005e0| 74 65 64 20 28 76 61 72 | 20 34 20 3d 3d 20 31 29 |ted (var| 4 == 1)|
|000005f0| 20 74 68 65 6e 20 6a 75 | 6d 70 20 6c 61 62 65 6c | then ju|mp label|
|00000600| 20 35 0d 69 66 73 74 72 | 20 34 20 35 20 22 31 22 | 5.ifstr| 4 5 "1"|
|00000610| 0d 21 0d 21 20 69 66 20 | 6e 6f 20 6d 6f 64 65 6d |.!.! if |no modem|
|00000620| 20 76 34 32 20 6c 69 6e | 6b 20 72 65 71 75 65 73 | v42 lin|k reques|
|00000630| 74 65 64 20 28 76 61 72 | 20 34 20 3d 3d 20 30 29 |ted (var| 4 == 0)|
|00000640| 20 5b 73 61 6d 65 20 61 | 73 20 41 52 41 20 31 2e | [same a|s ARA 1.|
|00000650| 30 5d 20 74 68 65 6e 20 | 6a 75 6d 70 20 6c 61 62 |0] then |jump lab|
|00000660| 65 6c 20 39 0d 69 66 73 | 74 72 20 34 20 39 20 22 |el 9.ifs|tr 4 9 "|
|00000670| 30 22 0d 21 0d 21 20 65 | 6c 73 65 20 69 6e 76 61 |0".!.! e|lse inva|
|00000680| 6c 69 64 20 76 61 6c 75 | 65 20 69 6e 20 76 61 72 |lid valu|e in var|
|00000690| 20 34 3b 20 65 78 69 74 | 20 77 2f 65 72 72 6f 72 | 4; exit| w/error|
|000006a0| 0d 6a 75 6d 70 20 37 36 | 0d 21 0d 40 4c 41 42 45 |.jump 76|.!.@LABE|
|000006b0| 4c 20 34 0d 21 20 75 73 | 65 20 74 68 69 73 20 6c |L 4.! us|e this l|
|000006c0| 61 62 65 6c 20 66 6f 72 | 20 6d 6e 70 20 31 30 20 |abel for| mnp 10 |
|000006d0| 74 79 70 65 20 73 74 75 | 66 66 2c 20 62 75 74 0d |type stu|ff, but.|
|000006e0| 21 20 54 48 49 53 20 6d | 6f 64 65 6d 20 64 6f 65 |! THIS m|odem doe|
|000006f0| 73 6e 27 74 20 73 75 70 | 70 6f 72 74 20 6d 6e 70 |sn't sup|port mnp|
|00000700| 20 31 30 20 6c 69 6e 6b | 73 2e 0d 6a 75 6d 70 20 | 10 link|s..jump |
|00000710| 35 0d 21 0d 40 4c 41 42 | 45 4c 20 35 0d 21 20 79 |5.!.@LAB|EL 5.! y|
|00000720| 65 73 2c 20 76 34 32 20 | 6c 69 6e 6b 20 69 73 20 |es, v42 |link is |
|00000730| 72 65 71 75 65 73 74 65 | 64 2e 20 20 4f 4b 20 66 |requeste|d.  OK f|
|00000740| 6f 72 20 4c 41 50 2d 4d | 20 2d 3e 20 4d 4e 50 20 |or LAP-M| -> MNP |
|00000750| 34 2e 0d 6d 61 74 63 68 | 63 6c 72 0d 6d 61 74 63 |4..match|clr.matc|
|00000760| 68 73 74 72 20 31 20 37 | 20 22 4f 4b 5c 31 33 5c |hstr 1 7| "OK\13\|
|00000770| 31 30 22 0d 21 20 26 41 | 33 20 3d 3d 20 67 69 76 |10".! &A|3 == giv|
|00000780| 65 73 20 50 52 4f 54 4f | 43 4f 4c 3a 20 61 6e 64 |es PROTO|COL: and|
|00000790| 20 43 4f 4e 4e 45 43 54 | 20 72 65 73 75 6c 74 20 | CONNECT| result |
|000007a0| 63 6f 64 65 73 0d 21 20 | 26 4d 34 20 3d 3d 20 76 |codes.! |&M4 == v|
|000007b0| 34 32 20 61 75 74 6f 72 | 65 6c 69 61 62 6c 65 20 |42 autor|eliable |
|000007c0| 6d 6f 64 65 0d 21 20 26 | 4b 33 20 3d 3d 20 4d 4e |mode.! &|K3 == MN|
|000007d0| 50 20 35 20 76 34 32 62 | 20 64 69 73 61 62 6c 65 |P 5 v42b| disable|
|000007e0| 64 0d 21 20 26 4b 30 20 | 3d 3d 20 4c 5a 57 20 76 |d.! &K0 |== LZW v|
|000007f0| 34 32 62 20 64 69 73 61 | 62 6c 65 64 20 28 73 75 |42b disa|bled (su|
|00000800| 62 73 74 69 74 75 74 65 | 20 5c 33 34 20 66 6f 72 |bstitute| \34 for|
|00000810| 20 22 29 0d 77 72 69 74 | 65 20 22 41 54 26 41 33 | ").writ|e "AT&A3|
|00000820| 26 4d 34 26 4b 30 5c 31 | 33 22 0d 6d 61 74 63 68 |&M4&K0\1|3".match|
|00000830| 72 65 61 64 20 33 30 30 | 0d 6a 75 6d 70 20 37 31 |read 300|.jump 71|
|00000840| 0d 21 0d 40 4c 41 42 45 | 4c 20 37 0d 21 20 69 66 |.!.@LABE|L 7.! if|
|00000850| 20 77 65 20 44 49 44 20 | 77 61 6e 74 20 76 34 32 | we DID |want v42|
|00000860| 62 20 69 6e 20 74 68 65 | 20 6d 6f 64 65 6d 2c 20 |b in the| modem, |
|00000870| 74 68 69 73 20 69 73 20 | 77 68 65 72 65 20 69 74 |this is |where it|
|00000880| 20 77 6f 75 6c 64 20 67 | 6f 2c 0d 21 20 62 75 74 | would g|o,.! but|
|00000890| 20 73 69 6e 63 65 20 74 | 68 65 20 63 70 75 20 64 | since t|he cpu d|
|000008a0| 6f 65 73 20 61 20 62 65 | 74 74 65 72 20 6a 6f 62 |oes a be|tter job|
|000008b0| 20 61 74 20 63 6f 6d 70 | 72 65 73 73 69 6e 67 20 | at comp|ressing |
|000008c0| 63 6f 6d 70 72 65 73 73 | 61 62 6c 65 0d 21 20 66 |compress|able.! f|
|000008d0| 69 6c 65 73 2c 20 74 68 | 69 73 20 73 65 74 75 70 |iles, th|is setup|
|000008e0| 20 73 74 75 66 66 20 69 | 73 20 63 6f 6d 6d 65 6e | stuff i|s commen|
|000008f0| 74 65 64 20 6f 75 74 2e | 20 20 74 68 65 20 6d 61 |ted out.|  the ma|
|00000900| 74 63 68 73 74 72 69 6e | 67 73 20 61 6e 64 0d 21 |tchstrin|gs and.!|
|00000910| 20 61 73 73 6f 63 69 61 | 74 65 64 20 6c 61 62 65 | associa|ted labe|
|00000920| 6c 73 20 68 61 76 65 20 | 62 65 65 6e 20 6c 65 66 |ls have |been lef|
|00000930| 74 20 69 6e 2e 0d 6d 61 | 74 63 68 63 6c 72 0d 6d |t in..ma|tchclr.m|
|00000940| 61 74 63 68 73 74 72 20 | 31 20 39 20 22 4f 4b 5c |atchstr |1 9 "OK\|
|00000950| 31 33 5c 31 30 22 0d 21 | 20 26 41 33 20 28 64 65 |13\10".!| &A3 (de|
|00000960| 63 29 20 61 64 64 73 20 | 43 4f 4d 50 52 45 53 53 |c) adds |COMPRESS|
|00000970| 49 4f 4e 3a 20 72 65 73 | 75 6c 74 20 63 6f 64 65 |ION: res|ult code|
|00000980| 73 0d 21 20 26 4b 31 20 | 3d 3d 20 4d 4e 50 20 35 |s.! &K1 |== MNP 5|
|00000990| 20 76 34 32 62 20 65 6e | 61 62 6c 65 64 0d 21 20 | v42b en|abled.! |
|000009a0| 26 4b 33 20 3d 3d 20 4c | 5a 57 20 76 34 32 62 20 |&K3 == L|ZW v42b |
|000009b0| 65 6e 61 62 6c 65 64 20 | 28 73 75 62 73 74 69 74 |enabled |(substit|
|000009c0| 75 74 65 20 5c 33 34 20 | 66 6f 72 20 22 29 0d 77 |ute \34 |for ").w|
|000009d0| 72 69 74 65 20 22 41 54 | 26 41 33 26 4b 33 5c 31 |rite "AT|&A3&K3\1|
|000009e0| 33 22 0d 6d 61 74 63 68 | 72 65 61 64 20 33 30 30 |3".match|read 300|
|000009f0| 0d 6a 75 6d 70 20 37 31 | 0d 21 0d 40 4c 41 42 45 |.jump 71|.!.@LABE|
|00000a00| 4c 20 39 0d 21 20 49 66 | 20 73 70 65 61 6b 65 72 |L 9.! If| speaker|
|00000a10| 20 6f 6e 20 66 6c 61 67 | 20 69 73 20 74 72 75 65 | on flag| is true|
|00000a20| 2c 20 6a 75 6d 70 20 74 | 6f 20 6c 61 62 65 6c 20 |, jump t|o label |
|00000a30| 31 33 2e 20 20 45 6c 73 | 65 20 74 75 72 6e 20 6f |13.  Els|e turn o|
|00000a40| 66 66 20 74 68 65 20 73 | 70 65 61 6b 65 72 2e 0d |ff the s|peaker..|
|00000a50| 69 66 73 74 72 20 32 20 | 31 33 20 22 31 22 0d 70 |ifstr 2 |13 "1".p|
|00000a60| 61 75 73 65 20 35 0d 6d | 61 74 63 68 63 6c 72 0d |ause 5.m|atchclr.|
|00000a70| 6d 61 74 63 68 73 74 72 | 20 31 20 31 33 20 22 4f |matchstr| 1 13 "O|
|00000a80| 4b 5c 31 33 5c 31 30 22 | 0d 77 72 69 74 65 20 22 |K\13\10"|.write "|
|00000a90| 41 54 4d 30 5c 31 33 22 | 0d 6d 61 74 63 68 72 65 |ATM0\13"|.matchre|
|00000aa0| 61 64 20 33 30 0d 6a 75 | 6d 70 20 37 31 0d 21 0d |ad 30.ju|mp 71.!.|
|00000ab0| 21 20 6d 6f 64 65 6d 20 | 72 65 61 64 79 2c 20 73 |! modem |ready, s|
|00000ac0| 6f 20 65 6e 61 62 6c 65 | 20 61 6e 73 77 65 72 69 |o enable| answeri|
|00000ad0| 6e 67 20 6f 72 20 6f 72 | 69 67 69 6e 61 74 65 20 |ng or or|iginate |
|00000ae0| 61 20 63 61 6c 6c 20 2d | 20 6c 61 62 65 6c 20 72 |a call -| label r|
|00000af0| 61 6e 67 65 20 69 73 20 | 31 31 2d 33 30 0d 21 0d |ange is |11-30.!.|
|00000b00| 40 4c 41 42 45 4c 20 31 | 33 0d 70 61 75 73 65 20 |@LABEL 1|3.pause |
|00000b10| 35 0d 69 66 41 4e 53 57 | 45 52 20 36 32 0d 21 0d |5.ifANSW|ER 62.!.|
|00000b20| 21 20 69 66 20 6e 6f 72 | 6d 61 6c 20 64 69 61 6c |! if nor|mal dial|
|00000b30| 69 6e 67 20 28 70 61 72 | 6d 20 36 20 3d 3d 20 30 |ing (par|m 6 == 0|
|00000b40| 29 20 6a 75 6d 70 20 74 | 6f 20 31 39 0d 69 66 73 |) jump t|o 19.ifs|
|00000b50| 74 72 20 36 20 31 39 20 | 22 30 22 0d 21 0d 21 20 |tr 6 19 |"0".!.! |
|00000b60| 69 66 20 62 6c 69 6e 64 | 20 64 69 61 6c 69 6e 67 |if blind| dialing|
|00000b70| 20 28 70 61 72 6d 20 36 | 20 3d 3d 20 31 29 20 6a | (parm 6| == 1) j|
|00000b80| 75 6d 70 20 74 6f 20 31 | 37 0d 69 66 73 74 72 20 |ump to 1|7.ifstr |
|00000b90| 36 20 31 37 20 22 31 22 | 0d 21 0d 21 20 69 66 20 |6 17 "1"|.!.! if |
|00000ba0| 6d 61 6e 75 61 6c 20 64 | 69 61 6c 69 6e 67 20 28 |manual d|ialing (|
|00000bb0| 70 61 72 6d 20 36 20 3d | 3d 20 32 29 20 6a 75 6d |parm 6 =|= 2) jum|
|00000bc0| 70 20 74 6f 20 31 35 20 | 0d 69 66 73 74 72 20 36 |p to 15 |.ifstr 6|
|00000bd0| 20 31 35 20 22 32 22 0d | 21 0d 21 20 65 6c 73 65 | 15 "2".|!.! else|
|00000be0| 20 69 6e 76 61 6c 69 64 | 20 76 61 6c 75 65 20 69 | invalid| value i|
|00000bf0| 6e 20 76 61 72 20 36 3b | 20 65 78 69 74 20 77 2f |n var 6;| exit w/|
|00000c00| 65 72 72 6f 72 0d 6a 75 | 6d 70 20 37 36 0d 21 0d |error.ju|mp 76.!.|
|00000c10| 40 6c 61 62 65 6c 20 31 | 35 0d 6e 6f 74 65 20 22 |@label 1|5.note "|
|00000c20| 4d 61 6e 75 61 6c 20 64 | 69 61 6c 69 6e 67 20 69 |Manual d|ialing i|
|00000c30| 6e 69 74 69 61 74 65 64 | 22 20 33 0d 21 20 58 31 |nitiated|" 3.! X1|
|00000c40| 20 74 6f 20 69 67 6e 6f | 72 65 20 64 69 61 6c 74 | to igno|re dialt|
|00000c50| 6f 6e 65 20 26 20 62 75 | 73 79 20 66 6f 72 20 6d |one & bu|sy for m|
|00000c60| 61 6e 75 61 6c 20 64 69 | 61 6c 69 6e 67 2c 20 44 |anual di|aling, D|
|00000c70| 20 74 6f 20 64 69 61 6c | 0d 77 72 69 74 65 20 22 | to dial|.write "|
|00000c80| 41 54 58 31 44 20 5c 31 | 33 22 0d 6a 75 6d 70 20 |ATX1D \1|3".jump |
|00000c90| 33 32 0d 21 0d 40 6c 61 | 62 65 6c 20 31 37 0d 6e |32.!.@la|bel 17.n|
|00000ca0| 6f 74 65 20 22 44 69 61 | 6c 69 6e 67 20 77 69 74 |ote "Dia|ling wit|
|00000cb0| 68 6f 75 74 20 74 6f 6e | 65 22 20 33 0d 6d 61 74 |hout ton|e" 3.mat|
|00000cc0| 63 68 63 6c 72 0d 6d 61 | 74 63 68 73 74 72 20 31 |chclr.ma|tchstr 1|
|00000cd0| 20 31 39 20 22 4f 4b 5c | 31 33 5c 31 30 22 0d 21 | 19 "OK\|13\10".!|
|00000ce0| 20 58 31 20 74 6f 20 69 | 67 6e 6f 72 65 20 64 69 | X1 to i|gnore di|
|00000cf0| 61 6c 74 6f 6e 65 20 26 | 20 62 75 73 79 20 66 6f |altone &| busy fo|
|00000d00| 72 20 62 6c 69 6e 64 20 | 64 69 61 6c 69 6e 67 0d |r blind |dialing.|
|00000d10| 77 72 69 74 65 20 22 41 | 54 58 31 5c 31 33 22 0d |write "A|TX1\13".|
|00000d20| 6d 61 74 63 68 72 65 61 | 64 20 33 30 0d 6a 75 6d |matchrea|d 30.jum|
|00000d30| 70 20 37 31 0d 21 0d 40 | 6c 61 62 65 6c 20 31 39 |p 71.!.@|label 19|
|00000d40| 0d 21 20 74 68 69 73 20 | 69 73 20 77 68 65 72 65 |.! this |is where|
|00000d50| 20 77 65 20 62 72 65 61 | 6b 20 75 70 20 6c 6f 6e | we brea|k up lon|
|00000d60| 67 20 64 69 61 6c 73 74 | 72 69 6e 67 73 0d 21 0d |g dialst|rings.!.|
|00000d70| 21 20 70 61 72 6d 20 31 | 20 69 73 20 61 6c 77 61 |! parm 1| is alwa|
|00000d80| 79 73 20 74 68 65 20 66 | 75 6c 6c 20 64 69 61 6c |ys the f|ull dial|
|00000d90| 73 74 72 69 6e 67 20 66 | 72 6f 6d 20 74 68 65 20 |string f|rom the |
|00000da0| 63 6f 6e 6e 20 64 6f 63 | 0d 6e 6f 74 65 20 22 44 |conn doc|.note "D|
|00000db0| 69 61 6c 69 6e 67 20 5e | 31 22 20 33 0d 21 20 70 |ialing ^|1" 3.! p|
|00000dc0| 61 72 6d 20 33 20 69 73 | 20 61 6c 77 61 79 73 20 |arm 3 is| always |
|00000dd0| 22 70 22 20 66 6f 72 20 | 70 75 6c 73 65 20 26 20 |"p" for |pulse & |
|00000de0| 22 74 22 20 66 6f 72 20 | 74 6f 6e 65 0d 21 0d 21 |"t" for |tone.!.!|
|00000df0| 20 69 66 20 70 61 72 6d | 20 38 20 3d 3d 20 62 6c | if parm| 8 == bl|
|00000e00| 61 6e 6b 20 28 63 6f 6d | 70 6c 65 74 65 20 64 69 |ank (com|plete di|
|00000e10| 61 6c 73 74 72 69 6e 67 | 20 69 6e 20 70 61 72 6d |alstring| in parm|
|00000e20| 20 37 29 0d 21 20 20 74 | 68 65 6e 20 6a 75 6d 70 | 7).!  t|hen jump|
|00000e30| 20 74 6f 20 6c 61 62 65 | 6c 20 32 37 20 26 20 64 | to labe|l 27 & d|
|00000e40| 69 61 6c 20 70 61 72 6d | 20 37 0d 69 66 73 74 72 |ial parm| 7.ifstr|
|00000e50| 20 38 20 32 37 20 22 20 | 22 0d 21 0d 21 20 69 66 | 8 27 " |".!.! if|
|00000e60| 20 70 61 72 6d 20 39 20 | 3d 3d 20 62 6c 61 6e 6b | parm 9 |== blank|
|00000e70| 20 28 63 6f 6d 70 6c 65 | 74 65 20 64 69 61 6c 73 | (comple|te dials|
|00000e80| 74 72 69 6e 67 20 69 6e | 20 70 61 72 6d 73 20 37 |tring in| parms 7|
|00000e90| 20 26 20 38 29 0d 21 20 | 20 74 68 65 6e 20 6a 75 | & 8).! | then ju|
|00000ea0| 6d 70 20 74 6f 20 6c 61 | 62 65 6c 20 32 34 20 26 |mp to la|bel 24 &|
|00000eb0| 20 64 69 61 6c 20 70 61 | 72 6d 20 37 20 26 20 38 | dial pa|rm 7 & 8|
|00000ec0| 0d 69 66 73 74 72 20 39 | 20 32 34 20 22 20 22 0d |.ifstr 9| 24 " ".|
|00000ed0| 21 0d 21 20 20 65 6c 73 | 65 20 64 69 61 6c 20 70 |!.!  els|e dial p|
|00000ee0| 61 72 6d 20 37 20 26 20 | 38 20 26 20 39 20 28 63 |arm 7 & |8 & 9 (c|
|00000ef0| 6f 6d 70 6c 65 74 65 20 | 64 69 61 6c 73 74 72 69 |omplete |dialstri|
|00000f00| 6e 67 20 69 6e 20 70 61 | 72 6d 73 20 37 2c 20 38 |ng in pa|rms 7, 8|
|00000f10| 20 26 20 39 29 0d 6d 61 | 74 63 68 63 6c 72 0d 6d | & 9).ma|tchclr.m|
|00000f20| 61 74 63 68 73 74 72 20 | 31 20 32 31 20 22 4f 4b |atchstr |1 21 "OK|
|00000f30| 5c 31 33 5c 31 30 22 0d | 21 20 70 61 72 6d 20 37 |\13\10".|! parm 7|
|00000f40| 20 68 6f 6c 64 73 20 66 | 69 72 73 74 20 73 74 72 | holds f|irst str|
|00000f50| 69 6e 67 20 66 72 61 67 | 6d 65 6e 74 0d 77 72 69 |ing frag|ment.wri|
|00000f60| 74 65 20 22 41 54 44 5e | 33 5e 37 3b 5c 31 33 22 |te "ATD^|3^7;\13"|
|00000f70| 0d 6d 61 74 63 68 72 65 | 61 64 20 34 30 30 0d 21 |.matchre|ad 400.!|
|00000f80| 20 6d 6f 64 65 6d 20 6e | 6f 74 20 72 65 73 70 6f | modem n|ot respo|
|00000f90| 6e 64 69 6e 67 3b 20 62 | 61 69 6c 6f 75 74 2e 0d |nding; b|ailout..|
|00000fa0| 6a 75 6d 70 20 37 31 0d | 40 6c 61 62 65 6c 20 32 |jump 71.|@label 2|
|00000fb0| 31 0d 21 20 70 61 72 6d | 20 38 20 68 6f 6c 64 73 |1.! parm| 8 holds|
|00000fc0| 20 73 65 63 6f 6e 64 20 | 73 74 72 69 6e 67 20 66 | second |string f|
|00000fd0| 72 61 67 6d 65 6e 74 0d | 6d 61 74 63 68 63 6c 72 |ragment.|matchclr|
|00000fe0| 0d 6d 61 74 63 68 73 74 | 72 20 31 20 32 32 20 22 |.matchst|r 1 22 "|
|00000ff0| 4f 4b 5c 31 33 5c 31 30 | 22 0d 77 72 69 74 65 20 |OK\13\10|".write |
|00001000| 22 41 54 58 33 44 5e 33 | 5e 38 3b 5c 31 33 22 0d |"ATX3D^3|^8;\13".|
|00001010| 6d 61 74 63 68 72 65 61 | 64 20 34 30 30 0d 21 20 |matchrea|d 400.! |
|00001020| 6d 6f 64 65 6d 20 6e 6f | 74 20 72 65 73 70 6f 6e |modem no|t respon|
|00001030| 64 69 6e 67 3b 20 62 61 | 69 6c 6f 75 74 2e 0d 6a |ding; ba|ilout..j|
|00001040| 75 6d 70 20 37 31 0d 40 | 6c 61 62 65 6c 20 32 32 |ump 71.@|label 22|
|00001050| 0d 21 20 70 61 72 6d 20 | 39 20 68 6f 6c 64 73 20 |.! parm |9 holds |
|00001060| 6c 61 73 74 20 73 74 72 | 69 6e 67 20 66 72 61 67 |last str|ing frag|
|00001070| 6d 65 6e 74 0d 77 72 69 | 74 65 20 22 41 54 58 33 |ment.wri|te "ATX3|
|00001080| 44 5e 33 5e 39 5c 31 33 | 22 0d 6a 75 6d 70 20 33 |D^3^9\13|".jump 3|
|00001090| 32 0d 21 0d 40 6c 61 62 | 65 6c 20 32 34 0d 6d 61 |2.!.@lab|el 24.ma|
|000010a0| 74 63 68 63 6c 72 0d 6d | 61 74 63 68 73 74 72 20 |tchclr.m|atchstr |
|000010b0| 31 20 32 35 20 22 4f 4b | 5c 31 33 5c 31 30 22 0d |1 25 "OK|\13\10".|
|000010c0| 21 20 70 61 72 6d 20 37 | 20 68 6f 6c 64 73 20 66 |! parm 7| holds f|
|000010d0| 69 72 73 74 20 73 74 72 | 69 6e 67 20 66 72 61 67 |irst str|ing frag|
|000010e0| 6d 65 6e 74 0d 77 72 69 | 74 65 20 22 41 54 44 5e |ment.wri|te "ATD^|
|000010f0| 33 5e 37 3b 5c 31 33 22 | 0d 6d 61 74 63 68 72 65 |3^7;\13"|.matchre|
|00001100| 61 64 20 34 30 30 0d 21 | 20 6d 6f 64 65 6d 20 6e |ad 400.!| modem n|
|00001110| 6f 74 20 72 65 73 70 6f | 6e 64 69 6e 67 3b 20 62 |ot respo|nding; b|
|00001120| 61 69 6c 6f 75 74 2e 0d | 6a 75 6d 70 20 37 31 0d |ailout..|jump 71.|
|00001130| 40 6c 61 62 65 6c 20 32 | 35 0d 21 20 70 61 72 6d |@label 2|5.! parm|
|00001140| 20 38 20 68 6f 6c 64 73 | 20 6c 61 73 74 20 73 74 | 8 holds| last st|
|00001150| 72 69 6e 67 20 66 72 61 | 67 6d 65 6e 74 0d 77 72 |ring fra|gment.wr|
|00001160| 69 74 65 20 22 41 54 58 | 33 44 5e 33 5e 38 5c 31 |ite "ATX|3D^3^8\1|
|00001170| 33 22 0d 6a 75 6d 70 20 | 33 32 0d 21 0d 40 6c 61 |3".jump |32.!.@la|
|00001180| 62 65 6c 20 32 37 0d 21 | 20 70 61 72 6d 20 37 20 |bel 27.!| parm 7 |
|00001190| 68 6f 6c 64 73 20 65 6e | 74 69 72 65 20 73 74 72 |holds en|tire str|
|000011a0| 69 6e 67 0d 77 72 69 74 | 65 20 22 41 54 44 5e 33 |ing.writ|e "ATD^3|
|000011b0| 5e 37 5c 31 33 22 0d 6a | 75 6d 70 20 33 32 0d 21 |^7\13".j|ump 32.!|
|000011c0| 0d 21 20 20 20 20 63 6f | 6e 6e 65 63 74 69 6e 67 |.!    co|nnecting|
|000011d0| 20 2d 20 6c 61 62 65 6c | 20 72 61 6e 67 65 20 69 | - label| range i|
|000011e0| 73 20 33 31 2d 36 30 0d | 21 0d 40 4c 41 42 45 4c |s 31-60.|!.@LABEL|
|000011f0| 20 33 32 0d 6d 61 74 63 | 68 63 6c 72 0d 6d 61 74 | 32.matc|hclr.mat|
|00001200| 63 68 73 74 72 20 31 20 | 20 33 34 20 22 43 4f 4e |chstr 1 | 34 "CON|
|00001210| 4e 45 43 54 20 31 32 30 | 30 5c 31 33 5c 31 30 22 |NECT 120|0\13\10"|
|00001220| 0d 6d 61 74 63 68 73 74 | 72 20 32 20 20 33 35 20 |.matchst|r 2  35 |
|00001230| 22 43 4f 4e 4e 45 43 54 | 20 31 32 30 30 2f 41 52 |"CONNECT| 1200/AR|
|00001240| 51 22 0d 6d 61 74 63 68 | 73 74 72 20 33 20 20 33 |Q".match|str 3  3|
|00001250| 36 20 22 43 4f 4e 4e 45 | 43 54 20 32 34 30 30 22 |6 "CONNE|CT 2400"|
|00001260| 0d 6d 61 74 63 68 73 74 | 72 20 34 20 20 33 37 20 |.matchst|r 4  37 |
|00001270| 22 43 4f 4e 4e 45 43 54 | 20 34 38 30 30 22 0d 6d |"CONNECT| 4800".m|
|00001280| 61 74 63 68 73 74 72 20 | 35 20 20 33 38 20 22 43 |atchstr |5  38 "C|
|00001290| 4f 4e 4e 45 43 54 20 37 | 32 30 30 22 0d 6d 61 74 |ONNECT 7|200".mat|
|000012a0| 63 68 73 74 72 20 36 20 | 20 33 39 20 22 43 4f 4e |chstr 6 | 39 "CON|
|000012b0| 4e 45 43 54 20 39 36 30 | 30 22 0d 6d 61 74 63 68 |NECT 960|0".match|
|000012c0| 73 74 72 20 37 20 20 34 | 30 20 22 43 4f 4e 4e 45 |str 7  4|0 "CONNE|
|000012d0| 43 54 20 31 32 30 30 30 | 22 0d 6d 61 74 63 68 73 |CT 12000|".matchs|
|000012e0| 74 72 20 38 20 20 34 31 | 20 22 43 4f 4e 4e 45 43 |tr 8  41| "CONNEC|
|000012f0| 54 20 31 34 34 30 30 22 | 0d 6d 61 74 63 68 73 74 |T 14400"|.matchst|
|00001300| 72 20 39 20 20 34 32 20 | 22 43 4f 4e 4e 45 43 54 |r 9  42 |"CONNECT|
|00001310| 20 31 36 38 30 30 22 0d | 6d 61 74 63 68 73 74 72 | 16800".|matchstr|
|00001320| 20 31 30 20 34 33 20 22 | 43 4f 4e 4e 45 43 54 20 | 10 43 "|CONNECT |
|00001330| 31 39 32 30 30 22 0d 6d | 61 74 63 68 73 74 72 20 |19200".m|atchstr |
|00001340| 31 31 20 34 34 20 22 43 | 4f 4e 4e 45 43 54 20 32 |11 44 "C|ONNECT 2|
|00001350| 31 36 30 30 22 0d 6d 61 | 74 63 68 73 74 72 20 31 |1600".ma|tchstr 1|
|00001360| 32 20 34 35 20 22 43 4f | 4e 4e 45 43 54 20 32 34 |2 45 "CO|NNECT 24|
|00001370| 30 30 30 22 0d 6d 61 74 | 63 68 73 74 72 20 31 33 |000".mat|chstr 13|
|00001380| 20 34 36 20 22 43 4f 4e | 4e 45 43 54 20 32 36 34 | 46 "CON|NECT 264|
|00001390| 30 30 22 0d 6d 61 74 63 | 68 73 74 72 20 31 34 20 |00".matc|hstr 14 |
|000013a0| 34 37 20 22 43 4f 4e 4e | 45 43 54 20 32 38 38 30 |47 "CONN|ECT 2880|
|000013b0| 30 22 0d 6d 61 74 63 68 | 73 74 72 20 31 35 20 37 |0".match|str 15 7|
|000013c0| 32 20 22 4e 4f 20 44 49 | 41 4c 20 54 4f 4e 45 5c |2 "NO DI|AL TONE\|
|000013d0| 31 33 5c 31 30 22 0d 6d | 61 74 63 68 73 74 72 20 |13\10".m|atchstr |
|000013e0| 31 36 20 37 33 20 22 4e | 4f 20 43 41 52 52 49 45 |16 73 "N|O CARRIE|
|000013f0| 52 5c 31 33 5c 31 30 22 | 0d 6d 61 74 63 68 73 74 |R\13\10"|.matchst|
|00001400| 72 20 31 37 20 37 34 20 | 22 42 55 53 59 5c 31 33 |r 17 74 |"BUSY\13|
|00001410| 5c 31 30 22 0d 6d 61 74 | 63 68 73 74 72 20 31 38 |\10".mat|chstr 18|
|00001420| 20 37 35 20 22 4e 4f 20 | 41 4e 53 57 45 52 5c 31 | 75 "NO |ANSWER\1|
|00001430| 33 5c 31 30 22 0d 6d 61 | 74 63 68 73 74 72 20 31 |3\10".ma|tchstr 1|
|00001440| 39 20 37 33 20 22 45 52 | 52 4f 52 5c 31 33 5c 31 |9 73 "ER|ROR\13\1|
|00001450| 30 22 0d 6d 61 74 63 68 | 72 65 61 64 20 37 30 30 |0".match|read 700|
|00001460| 0d 69 66 41 4e 53 57 45 | 52 20 33 32 0d 6a 75 6d |.ifANSWE|R 32.jum|
|00001470| 70 20 37 31 0d 21 0d 21 | 20 20 54 48 49 53 20 76 |p 71.!.!|  THIS v|
|00001480| 33 32 62 20 6d 6f 64 65 | 6d 20 68 61 73 20 62 65 |32b mode|m has be|
|00001490| 65 6e 20 73 65 74 75 70 | 20 74 6f 20 64 6f 20 63 |en setup| to do c|
|000014a0| 74 73 20 68 61 6e 64 73 | 68 61 6b 69 6e 67 2c 0d |ts hands|haking,.|
|000014b0| 21 20 20 61 6e 64 20 77 | 65 20 61 73 73 75 6d 65 |!  and w|e assume|
|000014c0| 20 74 68 61 74 20 61 20 | 63 74 73 20 68 61 6e 64 | that a |cts hand|
|000014d0| 73 68 61 6b 69 6e 67 20 | 63 61 62 6c 65 20 69 73 |shaking |cable is|
|000014e0| 20 62 65 69 6e 67 20 75 | 73 65 64 2c 0d 21 20 20 | being u|sed,.!  |
|000014f0| 73 6f 20 77 65 20 6c 65 | 61 76 65 20 74 68 65 20 |so we le|ave the |
|00001500| 73 65 72 69 61 6c 20 70 | 6f 72 74 20 73 65 74 20 |serial p|ort set |
|00001510| 74 6f 20 31 39 2c 32 30 | 30 20 62 70 73 2e 0d 21 |to 19,20|0 bps..!|
|00001520| 20 20 0d 21 20 20 69 6e | 20 61 20 76 33 32 20 6f |  .!  in| a v32 o|
|00001530| 72 20 76 32 32 62 20 6d | 6f 64 65 6d 2c 20 77 65 |r v22b m|odem, we|
|00001540| 20 61 73 73 75 6d 65 20 | 74 68 65 20 6c 6f 77 65 | assume |the lowe|
|00001550| 72 20 64 61 74 61 20 72 | 61 74 65 20 77 6f 6e 27 |r data r|ate won'|
|00001560| 74 20 72 65 71 75 69 72 | 65 0d 21 20 20 63 74 73 |t requir|e.!  cts|
|00001570| 20 68 61 6e 64 73 68 61 | 6b 69 6e 67 2e 20 20 0d | handsha|king.  .|
|00001580| 21 0d 40 4c 41 42 45 4c | 20 33 34 0d 6e 6f 74 65 |!.@LABEL| 34.note|
|00001590| 20 22 43 6f 6d 6d 75 6e | 69 63 61 74 69 6e 67 20 | "Commun|icating |
|000015a0| 61 74 20 31 32 30 30 20 | 62 70 73 2e 22 20 33 0d |at 1200 |bps." 3.|
|000015b0| 43 6f 6d 6d 75 6e 69 63 | 61 74 69 6e 67 41 74 20 |Communic|atingAt |
|000015c0| 31 32 30 30 0d 6a 75 6d | 70 20 34 38 0d 21 0d 40 |1200.jum|p 48.!.@|
|000015d0| 4c 41 42 45 4c 20 33 35 | 0d 6e 6f 74 65 20 22 43 |LABEL 35|.note "C|
|000015e0| 6f 6d 6d 75 6e 69 63 61 | 74 69 6e 67 20 61 74 20 |ommunica|ting at |
|000015f0| 31 32 30 30 20 62 70 73 | 2e 22 20 33 0d 43 6f 6d |1200 bps|." 3.Com|
|00001600| 6d 75 6e 69 63 61 74 69 | 6e 67 41 74 20 31 32 30 |municati|ngAt 120|
|00001610| 30 0d 6a 75 6d 70 20 34 | 39 0d 21 0d 40 4c 41 42 |0.jump 4|9.!.@LAB|
|00001620| 45 4c 20 33 36 0d 6e 6f | 74 65 20 22 43 6f 6d 6d |EL 36.no|te "Comm|
|00001630| 75 6e 69 63 61 74 69 6e | 67 20 61 74 20 32 34 30 |unicatin|g at 240|
|00001640| 30 20 62 70 73 2e 22 20 | 33 0d 43 6f 6d 6d 75 6e |0 bps." |3.Commun|
|00001650| 69 63 61 74 69 6e 67 41 | 74 20 32 34 30 30 0d 6a |icatingA|t 2400.j|
|00001660| 75 6d 70 20 34 38 0d 21 | 0d 40 4c 41 42 45 4c 20 |ump 48.!|.@LABEL |
|00001670| 33 37 0d 6e 6f 74 65 20 | 22 43 6f 6d 6d 75 6e 69 |37.note |"Communi|
|00001680| 63 61 74 69 6e 67 20 61 | 74 20 34 38 30 30 20 62 |cating a|t 4800 b|
|00001690| 70 73 2e 22 20 33 0d 43 | 6f 6d 6d 75 6e 69 63 61 |ps." 3.C|ommunica|
|000016a0| 74 69 6e 67 41 74 20 34 | 38 30 30 0d 6a 75 6d 70 |tingAt 4|800.jump|
|000016b0| 20 34 38 0d 21 0d 40 4c | 41 42 45 4c 20 33 38 0d | 48.!.@L|ABEL 38.|
|000016c0| 6e 6f 74 65 20 22 43 6f | 6d 6d 75 6e 69 63 61 74 |note "Co|mmunicat|
|000016d0| 69 6e 67 20 61 74 20 37 | 32 30 30 20 62 70 73 2e |ing at 7|200 bps.|
|000016e0| 22 20 33 0d 43 6f 6d 6d | 75 6e 69 63 61 74 69 6e |" 3.Comm|unicatin|
|000016f0| 67 41 74 20 37 32 30 30 | 0d 6a 75 6d 70 20 34 38 |gAt 7200|.jump 48|
|00001700| 0d 21 0d 40 4c 41 42 45 | 4c 20 33 39 0d 6e 6f 74 |.!.@LABE|L 39.not|
|00001710| 65 20 22 43 6f 6d 6d 75 | 6e 69 63 61 74 69 6e 67 |e "Commu|nicating|
|00001720| 20 61 74 20 39 36 30 30 | 20 62 70 73 2e 22 20 33 | at 9600| bps." 3|
|00001730| 0d 43 6f 6d 6d 75 6e 69 | 63 61 74 69 6e 67 41 74 |.Communi|catingAt|
|00001740| 20 39 36 30 30 0d 6a 75 | 6d 70 20 34 38 0d 21 0d | 9600.ju|mp 48.!.|
|00001750| 40 4c 41 42 45 4c 20 34 | 30 0d 6e 6f 74 65 20 22 |@LABEL 4|0.note "|
|00001760| 43 6f 6d 6d 75 6e 69 63 | 61 74 69 6e 67 20 61 74 |Communic|ating at|
|00001770| 20 31 32 30 30 30 20 62 | 70 73 2e 22 20 33 0d 43 | 12000 b|ps." 3.C|
|00001780| 6f 6d 6d 75 6e 69 63 61 | 74 69 6e 67 41 74 20 31 |ommunica|tingAt 1|
|00001790| 32 30 30 30 0d 6a 75 6d | 70 20 34 38 0d 21 0d 40 |2000.jum|p 48.!.@|
|000017a0| 4c 41 42 45 4c 20 34 31 | 0d 6e 6f 74 65 20 22 43 |LABEL 41|.note "C|
|000017b0| 6f 6d 6d 75 6e 69 63 61 | 74 69 6e 67 20 61 74 20 |ommunica|ting at |
|000017c0| 31 34 34 30 30 20 62 70 | 73 2e 22 20 33 0d 43 6f |14400 bp|s." 3.Co|
|000017d0| 6d 6d 75 6e 69 63 61 74 | 69 6e 67 41 74 20 31 34 |mmunicat|ingAt 14|
|000017e0| 34 30 30 0d 6a 75 6d 70 | 20 34 38 0d 21 0d 40 4c |400.jump| 48.!.@L|
|000017f0| 41 42 45 4c 20 34 32 0d | 6e 6f 74 65 20 22 43 6f |ABEL 42.|note "Co|
|00001800| 6d 6d 75 6e 69 63 61 74 | 69 6e 67 20 61 74 20 31 |mmunicat|ing at 1|
|00001810| 36 38 30 30 20 62 70 73 | 2e 22 20 33 0d 43 6f 6d |6800 bps|." 3.Com|
|00001820| 6d 75 6e 69 63 61 74 69 | 6e 67 41 74 20 31 36 38 |municati|ngAt 168|
|00001830| 30 30 0d 6a 75 6d 70 20 | 34 38 0d 21 0d 40 4c 41 |00.jump |48.!.@LA|
|00001840| 42 45 4c 20 34 33 0d 6e | 6f 74 65 20 22 43 6f 6d |BEL 43.n|ote "Com|
|00001850| 6d 75 6e 69 63 61 74 69 | 6e 67 20 61 74 20 31 39 |municati|ng at 19|
|00001860| 32 30 30 20 62 70 73 2e | 22 20 33 0d 43 6f 6d 6d |200 bps.|" 3.Comm|
|00001870| 75 6e 69 63 61 74 69 6e | 67 41 74 20 31 39 32 30 |unicatin|gAt 1920|
|00001880| 30 0d 6a 75 6d 70 20 34 | 38 0d 21 0d 40 4c 41 42 |0.jump 4|8.!.@LAB|
|00001890| 45 4c 20 34 34 0d 6e 6f | 74 65 20 22 43 6f 6d 6d |EL 44.no|te "Comm|
|000018a0| 75 6e 69 63 61 74 69 6e | 67 20 61 74 20 32 31 36 |unicatin|g at 216|
|000018b0| 30 30 20 62 70 73 2e 22 | 20 33 0d 43 6f 6d 6d 75 |00 bps."| 3.Commu|
|000018c0| 6e 69 63 61 74 69 6e 67 | 41 74 20 32 31 36 30 30 |nicating|At 21600|
|000018d0| 0d 6a 75 6d 70 20 34 38 | 0d 21 0d 40 4c 41 42 45 |.jump 48|.!.@LABE|
|000018e0| 4c 20 34 35 0d 6e 6f 74 | 65 20 22 43 6f 6d 6d 75 |L 45.not|e "Commu|
|000018f0| 6e 69 63 61 74 69 6e 67 | 20 61 74 20 32 34 30 30 |nicating| at 2400|
|00001900| 30 20 62 70 73 2e 22 20 | 33 0d 43 6f 6d 6d 75 6e |0 bps." |3.Commun|
|00001910| 69 63 61 74 69 6e 67 41 | 74 20 32 34 30 30 30 0d |icatingA|t 24000.|
|00001920| 6a 75 6d 70 20 34 38 0d | 21 0d 40 4c 41 42 45 4c |jump 48.|!.@LABEL|
|00001930| 20 34 36 0d 6e 6f 74 65 | 20 22 43 6f 6d 6d 75 6e | 46.note| "Commun|
|00001940| 69 63 61 74 69 6e 67 20 | 61 74 20 32 36 34 30 30 |icating |at 26400|
|00001950| 20 62 70 73 2e 22 20 33 | 0d 43 6f 6d 6d 75 6e 69 | bps." 3|.Communi|
|00001960| 63 61 74 69 6e 67 41 74 | 20 32 36 34 30 30 0d 6a |catingAt| 26400.j|
|00001970| 75 6d 70 20 34 38 0d 21 | 0d 40 4c 41 42 45 4c 20 |ump 48.!|.@LABEL |
|00001980| 34 37 0d 6e 6f 74 65 20 | 22 43 6f 6d 6d 75 6e 69 |47.note |"Communi|
|00001990| 63 61 74 69 6e 67 20 61 | 74 20 32 38 38 30 30 20 |cating a|t 28800 |
|000019a0| 62 70 73 2e 22 20 33 0d | 43 6f 6d 6d 75 6e 69 63 |bps." 3.|Communic|
|000019b0| 61 74 69 6e 67 41 74 20 | 32 38 38 30 30 0d 6a 75 |atingAt |28800.ju|
|000019c0| 6d 70 20 34 38 0d 21 0d | 21 20 76 34 32 20 6c 69 |mp 48.!.|! v42 li|
|000019d0| 6e 6b 20 63 6f 6e 6e 65 | 63 74 69 6f 6e 73 2e 0d |nk conne|ctions..|
|000019e0| 21 20 75 73 65 72 68 6f | 6f 6b 20 32 20 74 65 6c |! userho|ok 2 tel|
|000019f0| 6c 73 20 41 52 41 20 74 | 68 61 74 20 61 20 6d 6f |ls ARA t|hat a mo|
|00001a00| 64 65 6d 2d 74 6f 2d 6d | 6f 64 65 6d 20 65 72 72 |dem-to-m|odem err|
|00001a10| 6f 72 20 63 6f 72 72 65 | 63 74 69 6e 67 20 70 72 |or corre|cting pr|
|00001a20| 6f 74 6f 63 6f 6c 20 68 | 61 73 20 62 65 65 6e 20 |otocol h|as been |
|00001a30| 6e 65 67 6f 74 69 61 74 | 65 64 0d 21 20 75 73 65 |negotiat|ed.! use|
|00001a40| 72 68 6f 6f 6b 20 34 20 | 77 6f 75 6c 64 20 74 65 |rhook 4 |would te|
|00001a50| 6c 6c 20 41 52 41 20 74 | 68 61 74 20 61 20 6d 6f |ll ARA t|hat a mo|
|00001a60| 64 65 6d 2d 74 6f 2d 6d | 6f 64 65 6d 20 6d 6e 70 |dem-to-m|odem mnp|
|00001a70| 20 31 30 20 70 72 6f 74 | 6f 63 6f 6c 20 68 61 73 | 10 prot|ocol has|
|00001a80| 20 62 65 65 6e 20 6e 65 | 67 6f 74 69 61 74 65 64 | been ne|gotiated|
|00001a90| 0d 21 0d 40 4c 41 42 45 | 4c 20 34 38 0d 6d 61 74 |.!.@LABE|L 48.mat|
|00001aa0| 63 68 63 6c 72 0d 6d 61 | 74 63 68 73 74 72 20 31 |chclr.ma|tchstr 1|
|00001ab0| 20 34 39 20 22 2f 41 52 | 51 22 0d 6d 61 74 63 68 | 49 "/AR|Q".match|
|00001ac0| 73 74 72 20 32 20 35 37 | 20 22 5c 31 33 5c 31 30 |str 2 57| "\13\10|
|00001ad0| 22 0d 6d 61 74 63 68 73 | 74 72 20 33 20 35 37 20 |".matchs|tr 3 57 |
|00001ae0| 22 2f 4e 4f 4e 45 5c 31 | 33 5c 31 30 22 0d 6d 61 |"/NONE\1|3\10".ma|
|00001af0| 74 63 68 72 65 61 64 20 | 33 30 0d 21 0d 40 4c 41 |tchread |30.!.@LA|
|00001b00| 42 45 4c 20 34 39 0d 6d | 61 74 63 68 63 6c 72 0d |BEL 49.m|atchclr.|
|00001b10| 6d 61 74 63 68 73 74 72 | 20 31 20 35 30 20 22 2f |matchstr| 1 50 "/|
|00001b20| 4c 41 50 4d 2f 22 0d 6d | 61 74 63 68 73 74 72 20 |LAPM/".m|atchstr |
|00001b30| 32 20 35 31 20 22 2f 4d | 4e 50 2f 22 0d 6d 61 74 |2 51 "/M|NP/".mat|
|00001b40| 63 68 72 65 61 64 20 33 | 30 0d 6a 75 6d 70 20 35 |chread 3|0.jump 5|
|00001b50| 38 0d 21 0d 40 4c 41 42 | 45 4c 20 35 30 0d 6e 6f |8.!.@LAB|EL 50.no|
|00001b60| 74 65 20 22 45 73 74 61 | 62 6c 69 73 68 65 64 20 |te "Esta|blished |
|00001b70| 45 72 72 6f 72 2d 43 6f | 72 72 65 63 74 69 6e 67 |Error-Co|rrecting|
|00001b80| 20 56 2e 34 32 20 6c 69 | 6e 6b 2e 22 20 33 0d 55 | V.42 li|nk." 3.U|
|00001b90| 53 45 52 48 4f 4f 4b 20 | 32 0d 6a 75 6d 70 20 35 |SERHOOK |2.jump 5|
|00001ba0| 32 0d 21 0d 40 4c 41 42 | 45 4c 20 35 31 0d 6e 6f |2.!.@LAB|EL 51.no|
|00001bb0| 74 65 20 22 45 73 74 61 | 62 6c 69 73 68 65 64 20 |te "Esta|blished |
|00001bc0| 45 72 72 6f 72 2d 43 6f | 72 72 65 63 74 69 6e 67 |Error-Co|rrecting|
|00001bd0| 20 4d 4e 50 20 6c 69 6e | 6b 2e 22 20 33 0d 55 53 | MNP lin|k." 3.US|
|00001be0| 45 52 48 4f 4f 4b 20 32 | 0d 6a 75 6d 70 20 35 32 |ERHOOK 2|.jump 52|
|00001bf0| 0d 21 0d 40 4c 41 42 45 | 4c 20 35 32 0d 6d 61 74 |.!.@LABE|L 52.mat|
|00001c00| 63 68 63 6c 72 0d 6d 61 | 74 63 68 73 74 72 20 31 |chclr.ma|tchstr 1|
|00001c10| 20 35 33 20 22 4d 4e 50 | 35 5c 31 33 5c 31 30 22 | 53 "MNP|5\13\10"|
|00001c20| 0d 6d 61 74 63 68 73 74 | 72 20 32 20 35 34 20 22 |.matchst|r 2 54 "|
|00001c30| 56 34 32 42 49 53 5c 31 | 33 5c 31 30 22 0d 6d 61 |V42BIS\1|3\10".ma|
|00001c40| 74 63 68 73 74 72 20 33 | 20 35 36 20 22 2f 4e 4f |tchstr 3| 56 "/NO|
|00001c50| 4e 45 5c 31 33 5c 31 30 | 22 0d 6d 61 74 63 68 72 |NE\13\10|".matchr|
|00001c60| 65 61 64 20 33 30 0d 6a | 75 6d 70 20 35 38 0d 21 |ead 30.j|ump 58.!|
|00001c70| 0d 40 4c 41 42 45 4c 20 | 35 33 0d 6e 6f 74 65 20 |.@LABEL |53.note |
|00001c80| 22 45 73 74 61 62 6c 69 | 73 68 65 64 20 44 61 74 |"Establi|shed Dat|
|00001c90| 61 2d 43 6f 6d 70 72 65 | 73 73 69 6e 67 20 4d 4e |a-Compre|ssing MN|
|00001ca0| 50 35 20 6c 69 6e 6b 2e | 22 20 33 0d 55 53 45 52 |P5 link.|" 3.USER|
|00001cb0| 48 4f 4f 4b 20 34 0d 6a | 75 6d 70 20 35 38 0d 21 |HOOK 4.j|ump 58.!|
|00001cc0| 0d 40 4c 41 42 45 4c 20 | 35 34 0d 6e 6f 74 65 20 |.@LABEL |54.note |
|00001cd0| 22 45 73 74 61 62 6c 69 | 73 68 65 64 20 44 61 74 |"Establi|shed Dat|
|00001ce0| 61 2d 43 6f 6d 70 72 65 | 73 73 69 6e 67 20 56 2e |a-Compre|ssing V.|
|00001cf0| 34 32 62 69 73 20 6c 69 | 6e 6b 2e 22 20 33 0d 55 |42bis li|nk." 3.U|
|00001d00| 53 45 52 48 4f 4f 4b 20 | 34 0d 6a 75 6d 70 20 35 |SERHOOK |4.jump 5|
|00001d10| 38 0d 21 0d 40 4c 41 42 | 45 4c 20 35 36 0d 6e 6f |8.!.@LAB|EL 56.no|
|00001d20| 74 65 20 22 4e 6f 20 44 | 43 20 6c 69 6e 6b 2e 20 |te "No D|C link. |
|00001d30| 55 73 69 6e 67 20 62 75 | 69 6c 74 2d 69 6e 20 41 |Using bu|ilt-in A|
|00001d40| 52 41 20 43 6f 6d 70 72 | 65 73 73 69 6f 6e 20 72 |RA Compr|ession r|
|00001d50| 6f 75 74 69 6e 65 73 2e | 22 20 33 0d 6a 75 6d 70 |outines.|" 3.jump|
|00001d60| 20 35 38 0d 40 4c 41 42 | 45 4c 20 35 37 0d 6e 6f | 58.@LAB|EL 57.no|
|00001d70| 74 65 20 22 4e 6f 20 45 | 43 20 6f 72 20 44 43 20 |te "No E|C or DC |
|00001d80| 6c 69 6e 6b 2e 20 55 73 | 69 6e 67 20 62 75 69 6c |link. Us|ing buil|
|00001d90| 74 2d 69 6e 20 41 52 41 | 20 72 6f 75 74 69 6e 65 |t-in ARA| routine|
|00001da0| 73 2e 22 20 33 0d 21 0d | 40 4c 41 42 45 4c 20 35 |s." 3.!.|@LABEL 5|
|00001db0| 38 0d 21 20 74 75 72 6e | 20 6f 6e 20 63 74 73 20 |8.! turn| on cts |
|00001dc0| 68 61 6e 64 73 68 61 6b | 69 6e 67 2e 0d 48 53 52 |handshak|ing..HSR|
|00001dd0| 65 73 65 74 20 30 20 31 | 20 30 20 30 20 30 20 30 |eset 0 1| 0 0 0 0|
|00001de0| 0d 21 0d 69 66 41 4e 53 | 57 45 52 20 35 39 0d 70 |.!.ifANS|WER 59.p|
|00001df0| 61 75 73 65 20 33 30 0d | 40 4c 41 42 45 4c 20 35 |ause 30.|@LABEL 5|
|00001e00| 39 0d 65 78 69 74 20 30 | 0d 21 0d 21 20 40 41 4e |9.exit 0|.!.! @AN|
|00001e10| 53 57 45 52 0d 21 20 53 | 65 74 20 74 68 65 20 6d |SWER.! S|et the m|
|00001e20| 6f 64 65 6d 20 74 6f 20 | 61 6e 73 77 65 72 20 6f |odem to |answer o|
|00001e30| 6e 20 31 73 74 20 72 69 | 6e 67 20 2d 20 6c 61 62 |n 1st ri|ng - lab|
|00001e40| 65 6c 20 72 61 6e 67 65 | 20 69 73 20 36 31 2d 37 |el range| is 61-7|
|00001e50| 30 0d 21 0d 40 4c 41 42 | 45 4c 20 36 32 0d 6d 61 |0.!.@LAB|EL 62.ma|
|00001e60| 74 63 68 63 6c 72 0d 6d | 61 74 63 68 73 74 72 20 |tchclr.m|atchstr |
|00001e70| 31 20 33 32 20 22 4f 4b | 5c 31 33 5c 31 30 22 0d |1 32 "OK|\13\10".|
|00001e80| 77 72 69 74 65 20 22 41 | 54 53 30 3d 31 5c 31 33 |write "A|TS0=1\13|
|00001e90| 22 0d 6d 61 74 63 68 72 | 65 61 64 20 33 30 0d 6a |".matchr|ead 30.j|
|00001ea0| 75 6d 70 20 37 31 0d 21 | 0d 40 4c 41 42 45 4c 20 |ump 71.!|.@LABEL |
|00001eb0| 36 38 0d 69 66 4f 52 49 | 47 49 4e 41 54 45 20 33 |68.ifORI|GINATE 3|
|00001ec0| 32 0d 21 20 63 6c 61 69 | 6d 20 74 68 65 20 73 65 |2.! clai|m the se|
|00001ed0| 72 69 61 6c 20 70 6f 72 | 74 0d 75 73 65 72 68 6f |rial por|t.userho|
|00001ee0| 6f 6b 20 31 0d 6e 6f 74 | 65 20 22 41 6e 73 77 65 |ok 1.not|e "Answe|
|00001ef0| 72 69 6e 67 20 70 68 6f | 6e 65 2e 2e 2e 22 20 32 |ring pho|ne..." 2|
|00001f00| 0d 6a 75 6d 70 20 33 32 | 0d 21 0d 21 20 65 72 72 |.jump 32|.!.! err|
|00001f10| 6f 72 20 6d 65 73 73 61 | 67 65 73 20 2d 20 6c 61 |or messa|ges - la|
|00001f20| 62 65 6c 20 72 61 6e 67 | 65 20 69 73 20 37 31 2d |bel rang|e is 71-|
|00001f30| 31 30 30 0d 21 0d 21 20 | 4d 6f 64 65 6d 20 4e 6f |100.!.! |Modem No|
|00001f40| 74 20 52 65 73 70 6f 6e | 64 69 6e 67 0d 40 4c 41 |t Respon|ding.@LA|
|00001f50| 42 45 4c 20 37 31 0d 65 | 78 69 74 20 2d 36 30 31 |BEL 71.e|xit -601|
|00001f60| 39 0d 21 0d 21 20 4e 6f | 20 44 69 61 6c 20 54 6f |9.!.! No| Dial To|
|00001f70| 6e 65 0d 40 4c 41 42 45 | 4c 20 37 32 0d 65 78 69 |ne.@LABE|L 72.exi|
|00001f80| 74 20 2d 36 30 32 30 0d | 21 0d 21 20 4e 6f 20 43 |t -6020.|!.! No C|
|00001f90| 61 72 72 69 65 72 20 6f | 72 20 45 72 72 6f 72 0d |arrier o|r Error.|
|00001fa0| 40 4c 41 42 45 4c 20 37 | 33 0d 65 78 69 74 20 2d |@LABEL 7|3.exit -|
|00001fb0| 36 30 32 31 0d 21 0d 21 | 20 42 75 73 79 0d 40 4c |6021.!.!| Busy.@L|
|00001fc0| 41 42 45 4c 20 37 34 0d | 65 78 69 74 20 2d 36 30 |ABEL 74.|exit -60|
|00001fd0| 32 32 0d 21 0d 21 20 4e | 6f 20 41 6e 73 77 65 72 |22.!.! N|o Answer|
|00001fe0| 0d 40 4c 41 42 45 4c 20 | 37 35 0d 65 78 69 74 20 |.@LABEL |75.exit |
|00001ff0| 2d 36 30 32 33 0d 21 0d | 21 20 76 61 72 73 74 72 |-6023.!.|! varstr|
|00002000| 69 6e 67 20 69 6e 76 61 | 6c 69 64 20 76 61 6c 75 |ing inva|lid valu|
|00002010| 65 0d 40 4c 41 42 45 4c | 20 37 36 0d 65 78 69 74 |e.@LABEL| 76.exit|
|00002020| 20 2d 36 30 32 37 0d 21 | 0d 21 20 48 61 6e 67 20 | -6027.!|.! Hang |
|00002030| 75 70 20 74 68 65 20 6d | 6f 64 65 6d 20 2d 20 6c |up the m|odem - l|
|00002040| 61 62 65 6c 20 72 61 6e | 67 65 20 69 73 20 31 30 |abel ran|ge is 10|
|00002050| 31 2d 31 32 30 0d 21 0d | 40 48 41 4e 47 55 50 0d |1-120.!.|@HANGUP.|
|00002060| 40 4c 41 42 45 4c 20 31 | 30 32 0d 73 65 74 74 72 |@LABEL 1|02.settr|
|00002070| 69 65 73 20 30 0d 73 65 | 72 72 65 73 65 74 20 35 |ies 0.se|rreset 5|
|00002080| 37 36 30 30 2c 20 30 2c | 20 38 2c 20 31 0d 48 53 |7600, 0,| 8, 1.HS|
|00002090| 52 65 73 65 74 20 30 20 | 30 20 30 20 30 20 30 20 |Reset 0 |0 0 0 0 |
|000020a0| 30 0d 40 4c 41 42 45 4c | 20 31 30 35 0d 21 0d 21 |0.@LABEL| 105.!.!|
|000020b0| 20 54 72 79 20 74 6f 20 | 67 65 74 20 63 6f 6e 74 | Try to |get cont|
|000020c0| 72 6f 6c 20 6f 66 20 74 | 68 65 20 6d 6f 64 65 6d |rol of t|he modem|
|000020d0| 2e 0d 21 0d 44 54 52 53 | 65 74 0d 70 61 75 73 65 |..!.DTRS|et.pause|
|000020e0| 20 35 0d 44 54 52 43 6c | 65 61 72 0d 66 6c 75 73 | 5.DTRCl|ear.flus|
|000020f0| 68 0d 21 0d 40 4c 41 42 | 45 4c 20 31 30 38 0d 66 |h.!.@LAB|EL 108.f|
|00002100| 6c 75 73 68 0d 6d 61 74 | 63 68 63 6c 72 0d 6d 61 |lush.mat|chclr.ma|
|00002110| 74 63 68 73 74 72 20 31 | 20 31 31 31 20 22 4e 4f |tchstr 1| 111 "NO|
|00002120| 20 43 41 52 52 49 45 52 | 5c 31 33 5c 31 30 22 0d | CARRIER|\13\10".|
|00002130| 6d 61 74 63 68 73 74 72 | 20 32 20 31 31 31 20 22 |matchstr| 2 111 "|
|00002140| 4f 4b 5c 31 33 5c 31 30 | 22 0d 6d 61 74 63 68 73 |OK\13\10|".matchs|
|00002150| 74 72 20 33 20 31 31 31 | 20 22 45 52 52 4f 52 5c |tr 3 111| "ERROR\|
|00002160| 31 33 5c 31 30 22 0d 77 | 72 69 74 65 20 22 41 54 |13\10".w|rite "AT|
|00002170| 48 5c 31 33 22 0d 6d 61 | 74 63 68 72 65 61 64 20 |H\13".ma|tchread |
|00002180| 33 30 0d 69 6e 63 74 72 | 69 65 73 0d 69 66 74 72 |30.inctr|ies.iftr|
|00002190| 69 65 73 20 33 20 37 31 | 0d 44 54 52 53 65 74 0d |ies 3 71|.DTRSet.|
|000021a0| 70 61 75 73 65 20 35 0d | 44 54 52 43 6c 65 61 72 |pause 5.|DTRClear|
|000021b0| 0d 70 61 75 73 65 20 35 | 0d 44 54 52 53 65 74 0d |.pause 5|.DTRSet.|
|000021c0| 66 6c 75 73 68 0d 21 0d | 40 4c 41 42 45 4c 20 31 |flush.!.|@LABEL 1|
|000021d0| 30 39 0d 6d 61 74 63 68 | 63 6c 72 0d 6d 61 74 63 |09.match|clr.matc|
|000021e0| 68 73 74 72 20 31 20 31 | 31 35 20 22 4f 4b 5c 31 |hstr 1 1|15 "OK\1|
|000021f0| 33 5c 31 30 22 0d 77 72 | 69 74 65 20 22 2b 2b 2b |3\10".wr|ite "+++|
|00002200| 22 0d 6d 61 74 63 68 72 | 65 61 64 20 31 35 0d 6a |".matchr|ead 15.j|
|00002210| 75 6d 70 20 31 30 38 0d | 21 0d 21 20 72 65 63 61 |ump 108.|!.! reca|
|00002220| 6c 6c 20 74 68 65 20 66 | 61 63 74 6f 72 79 20 73 |ll the f|actory s|
|00002230| 65 74 74 69 6e 67 73 2e | 0d 21 0d 40 4c 41 42 45 |ettings.|.!.@LABE|
|00002240| 4c 20 31 31 31 0d 70 61 | 75 73 65 20 31 35 0d 6d |L 111.pa|use 15.m|
|00002250| 61 74 63 68 63 6c 72 0d | 6d 61 74 63 68 73 74 72 |atchclr.|matchstr|
|00002260| 20 31 20 31 31 34 20 22 | 4f 4b 5c 31 33 5c 31 30 | 1 114 "|OK\13\10|
|00002270| 22 0d 77 72 69 74 65 20 | 22 41 54 26 46 26 44 30 |".write |"AT&F&D0|
|00002280| 45 30 56 31 51 30 53 30 | 3d 30 5c 31 33 22 0d 6d |E0V1Q0S0|=0\13".m|
|00002290| 61 74 63 68 72 65 61 64 | 20 33 30 0d 6a 75 6d 70 |atchread| 30.jump|
|000022a0| 20 37 31 0d 21 0d 40 4c | 41 42 45 4c 20 31 31 34 | 71.!.@L|ABEL 114|
|000022b0| 0d 65 78 69 74 20 30 0d | 0d 40 4c 41 42 45 4c 20 |.exit 0.|.@LABEL |
|000022c0| 31 31 35 0d 70 61 75 73 | 65 20 35 30 0d 6a 75 6d |115.paus|e 50.jum|
|000022d0| 70 20 31 30 38 0d 0d 21 | 0d 21 20 6c 61 62 65 6c |p 108..!|.! label|
|000022e0| 73 20 31 32 31 2d 31 32 | 38 20 61 72 65 20 72 65 |s 121-12|8 are re|
|000022f0| 73 65 72 76 65 64 20 66 | 6f 72 20 66 75 74 75 72 |served f|or futur|
|00002300| 65 20 65 6d 65 72 67 65 | 6e 63 79 20 68 61 63 6b |e emerge|ncy hack|
|00002310| 73 0d 21 0d 00 00 00 00 | 00 00 00 00 00 00 00 00 |s.!.....|........|
|00002320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002380| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00002390| 38 42 49 4d 2a 2a 2a 2a | 01 00 00 00 00 00 00 00 |8BIM****|........|
|000023a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023b0| 0b 55 53 52 2d 32 5f 30 | 2e 41 52 41 02 00 00 00 |.USR-2_0|.ARA....|
|000023c0| 6d 6c 74 73 73 6c 6e 6b | 00 00 00 00 00 00 00 00 |mltsslnk|........|
|000023d0| 00 00 6d 6c 74 73 73 6c | 6e 6b 00 00 00 00 00 00 |..mltssl|nk......|
|000023e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023f0| 00 00 aa 95 59 b5 00 00 | 22 94 00 00 01 7e 00 00 |....Y...|"....~..|
|00002400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002480| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 f9 |...H..Mo|naco....|
|00002490| 90 f8 00 00 00 00 01 10 | 96 6e 00 03 2d fc 03 cc |........|.n..-...|
|000024a0| 00 ff c0 16 00 00 00 04 | 00 04 00 28 00 03 02 5d |........|...(...]|
|000024b0| 03 39 00 28 00 03 02 5d | 03 39 00 01 9b e0 00 00 |.9.(...]|.9......|
|000024c0| 00 37 00 00 00 37 00 00 | 00 00 01 00 00 00 01 00 |.7...7..|........|
|000024d0| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 f9 90 f8 |...L...L|...2....|
|000024e0| 1f 38 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.8.....2|..MPSR..|
|000024f0| 00 0a 03 ed ff ff 00 00 | 00 00 00 fe f2 b8 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+